home *** CD-ROM | disk | FTP | other *** search
/ Ancient Asian Sex Secrets / Ancient Asian Sex Secrets.iso / mac / EROSPROM.Dxr / 00221.ls < prev    next >
Encoding:
Text File  |  1996-09-05  |  792 b   |  51 lines
  1. on Feat3
  2.   tran()
  3.   go("feat3")
  4.   cursor(0)
  5. end
  6.  
  7. on tran
  8.   cursor(4)
  9.   sound fadeOut 1, 30
  10.   killpup()
  11.   if the machineType = 256 then
  12.     movOff()
  13.     puppetTransition(24, 0, 128, 1)
  14.   else
  15.     if the colorDepth = 8 then
  16.       go("paltrans")
  17.       puppetSound(0)
  18.       exit
  19.     end if
  20.     puppetTransition(24, 0, 48, 1)
  21.   end if
  22.   puppetSound(0)
  23. end
  24.  
  25. on tranR
  26.   cursor(4)
  27.   killpup()
  28.   if the machineType = 256 then
  29.     movOff()
  30.     puppetTransition(11, 0, 128, 1)
  31.   else
  32.     if the colorDepth = 8 then
  33.     end if
  34.     puppetTransition(11, 0, 16, 1)
  35.   end if
  36. end
  37.  
  38. on tranl
  39.   cursor(4)
  40.   killpup()
  41.   if the machineType = 256 then
  42.     movOff()
  43.     puppetTransition(12, 0, 128, 1)
  44.   else
  45.     if the colorDepth = 8 then
  46.       openwind()
  47.     end if
  48.     puppetTransition(12, 0, 16, 1)
  49.   end if
  50. end
  51.